﻿

Public Class frmMain

    Private Sub cmdAbout_Click(sender As System.Object, e As System.EventArgs) Handles cmdAbout.Click
        frmAbout.Show()

    End Sub

    Private Sub cmdPacsDBConn_Click(sender As System.Object, e As System.EventArgs) Handles cmdPacsDBConn.Click
        frmMsSQLSetting.Show()
    End Sub

    Private Sub ButtonItem16_Click(sender As System.Object, e As System.EventArgs) Handles ButtonItem16.Click
        frmMySQLSetting.Show()
    End Sub

    Private Sub ButtonItem17_Click(sender As System.Object, e As System.EventArgs) Handles ButtonItem17.Click
        frmiQMySQLSetting.Show()
    End Sub

    Private Sub cmdBroker_Click_1(sender As System.Object, e As System.EventArgs) Handles cmdBroker.Click
        frmBroker.Show()
        'Me.Hide()
    End Sub

    Private Sub ButtonItem7_Click(sender As System.Object, e As System.EventArgs) Handles ButtonItem7.Click
        End
    End Sub

    Private Sub RibbonBar2_ItemClick(sender As System.Object, e As System.EventArgs) Handles RibbonBar2.ItemClick

    End Sub

   

    Private Sub cmdExport_Click(sender As System.Object, e As System.EventArgs) Handles cmdExport.Click
        'MainWindow.Show()
        frmExport.Show()
    End Sub

    Private Sub cmdImport_Click(sender As System.Object, e As System.EventArgs) Handles cmdImport.Click
        frmHL7Import.Show()
        ' Me.Hide()
        'frmBroker.Show()
        'frmLicense.Show()
    End Sub

    Private Sub frmMain_FormClosed(sender As Object, e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
        End
    End Sub

    Private Sub StatusStrip1_ItemClicked(sender As System.Object, e As System.Windows.Forms.ToolStripItemClickedEventArgs) Handles StatusStrip1.ItemClicked

    End Sub

    Private Sub ButtonItem1_Click(sender As System.Object, e As System.EventArgs) Handles ButtonItem1.Click
        frmTest.Show()
    End Sub

    Private Sub cmdScan_Click(sender As System.Object, e As System.EventArgs) Handles cmdScan.Click
        frmScan.Show()


    End Sub

    Private Sub RibbonPanel2_Click(sender As System.Object, e As System.EventArgs) Handles RibbonPanel2.Click

    End Sub

    Private Sub cmbCapture_Click(sender As System.Object, e As System.EventArgs) Handles cmbCapture.Click
        frmCapture.Show()
    End Sub
End Class